(deftemplate PC
    (slot client)
    (slot tempProcesor)
    (slot ram)
    (slot virusi)
    )
(assert (PC(client 1)(tempProcesor OK)(ram OK)(virusi nu)))
(assert (PC(client 2)(tempProcesor OK)(ram putini)(virusi nu)))
(assert (PC(client 3)(tempProcesor OK)(ram OK)(virusi da)))
(facts)
(run)

(defrule r1
    (PC (client ?n))
    (PC(client ?n)(ram putini))
=>
	(printout t "Calculatorului clientului " ?n " are memorie ram insuficienta. " crlf)
    )

(run)

(defrule r2
    (PC (client ?n))
    (PC(client ?n)(tempProcesor mare))
=>
	(printout t "Calculatorului clientului " ?n " are probleme cu procesorul" crlf)
    )

(run)

(defrule r3
    (PC (client ?n))
    (PC(client ?n)(virusi da))
=>
	(printout t "Calculatorului clientului " ?n " este virusat. " crlf)
    )

(run)